object fmUserVisible: TfmUserVisible
  Left = 414
  Top = 269
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = #21487#35265#29992#25143
  ClientHeight = 333
  ClientWidth = 329
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object grd: TcxGrid
    Left = 0
    Top = 0
    Width = 251
    Height = 333
    Align = alLeft
    TabOrder = 0
    object tv: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = ds
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsView.GroupByBox = False
      object tvlvuservisible: TcxGridDBColumn
        Caption = #21517#31216
        DataBinding.FieldName = 'lvuservisible'
        HeaderAlignmentHorz = taCenter
        Options.Editing = False
        Options.Filtering = False
        Width = 173
      end
      object tvlvvisible: TcxGridDBColumn
        Caption = #26159#21542#21487#35265
        DataBinding.FieldName = 'lvvisible'
        HeaderAlignmentHorz = taCenter
        Options.Filtering = False
        Width = 75
      end
    end
    object lv: TcxGridLevel
      GridView = tv
    end
  end
  object cxButton1: TcxButton
    Left = 256
    Top = 1
    Width = 70
    Height = 21
    Caption = #30830#23450
    ModalResult = 1
    TabOrder = 1
    OnClick = cxButton1Click
  end
  object cxButton2: TcxButton
    Left = 256
    Top = 25
    Width = 70
    Height = 21
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 2
    OnClick = cxButton2Click
  end
  object cxButton3: TcxButton
    Left = 256
    Top = 62
    Width = 70
    Height = 21
    Caption = #20840#36873
    TabOrder = 3
    OnClick = cxButton3Click
  end
  object cxButton4: TcxButton
    Left = 256
    Top = 86
    Width = 70
    Height = 21
    Caption = #20840#19981#36873
    TabOrder = 4
    OnClick = cxButton4Click
  end
  object qry: TADOQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=test;Data Source=bati'
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforeDelete = qryBeforeDelete
    Parameters = <
      item
        Name = 'lvuser'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 30
        Value = Null
      end>
    SQL.Strings = (
      
        'select lvuservisible,lvvisible from login_visible where lvuser=:' +
        'lvuser')
    Left = 112
    Top = 184
    object qrylvuservisible: TStringField
      FieldName = 'lvuservisible'
      Size = 30
    end
    object qrylvvisible: TBooleanField
      FieldName = 'lvvisible'
    end
  end
  object ds: TDataSource
    DataSet = qry
    Left = 152
    Top = 184
  end
end
